home *** CD-ROM | disk | FTP | other *** search
/ Sprite 1984 - 1993 / Sprite 1984 - 1993.iso / src / cmds / gcc-2.1 / dist / .gdbinit next >
Encoding:
Text File  |  1991-10-12  |  1.0 KB  |  68 lines
  1. define pr
  2. set debug_rtx ($)
  3. end
  4.  
  5. document pr
  6. Print the full structure of the rtx that is $.
  7. Works only when an inferior is executing.
  8. end
  9.  
  10. define pt
  11. set debug_tree ($)
  12. end
  13.  
  14. document pt
  15. Print the full structure of the tree that is $.
  16. Works only when an inferior is executing.
  17. end
  18.  
  19. define ptc
  20. output (enum tree_code) $.common.code
  21. echo \n
  22. end
  23.  
  24. document ptc
  25. Print the tree-code of the tree node that is $.
  26. end
  27.  
  28. define pdn
  29. output $.decl.name->identifier.pointer
  30. echo \n
  31. end
  32.  
  33. document pdn
  34. Print the name of the decl-node that is $.
  35. end
  36.  
  37. define ptn
  38. output $.type.name->decl.name->identifier.pointer
  39. echo \n
  40. end
  41.  
  42. document ptn
  43. Print the name of the type-node that is $.
  44. end
  45.  
  46. define prc
  47. output (enum rtx_code) $.code
  48. echo \ (
  49. output $.mode
  50. echo )\n
  51. end
  52.  
  53. document prc
  54. Print the rtx-code and machine mode of the rtx that is $.
  55. end
  56.  
  57. define pi
  58. print $.fld[0].rtx@7
  59. end
  60.  
  61. document pi
  62. Print the fields of an instruction that is $.
  63. end
  64.  
  65. # Don't let abort actually run, as it will make
  66. # stdio stop working and therefore the `pr' command below as well.
  67. b abort
  68.